//
// phpDeleteDirectory(dirPath)
//
// Delete a directory and it's contents. Requires SmartPill PHP plugin.
//
//
// Returns:
//		 0		Successful
//		-1		Couldn't open the ZIP archive
//		-2		Couldn't extract the ZIP archive
//
Let (
	[
		phpCode = "error_reporting(E_ALL & ~E_NOTICE);¶
		¶
		echo phpDeleteDirectory(fm_evaluate('$dirPath'), false);¶
		¶
		function phpDeleteDirectory($dirname, $only_empty)¶
		{¶
		 if (!is_dir($dirname))¶
		   return false;¶
		¶
		 $dscan = array(realpath($dirname));¶
		 $darr = array();¶
		 while (!empty($dscan))¶
			{¶
		   $dcur = array_pop($dscan);¶
		   $darr[] = $dcur;¶
		   if ($d=opendir($dcur))¶
				 {¶
		     while ($f=readdir($d))¶
					  {¶
		       if ($f=='.' || $f=='..')¶
		         continue;¶
		       $f=$dcur . '/' . $f;¶
		       if (is_dir($f))¶
		         $dscan[] = $f;¶
		       else¶
		         unlink($f);¶
		     }¶
		     closedir($d);¶
		   }¶
		 }¶
		 $i_until = ($only_empty) ? 1 : 0;¶
		 for ($i = count($darr) - 1; $i >= $i_until; $i--)¶
			{¶
		   rmdir($darr[$i]);¶
		 }¶
		 return (($only_empty) ? (count(scandir) <= 2) : (!is_dir($dirname)));¶
		}¶
	  "
	] ;

	PHP_Execute(phpCode)
)